home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The Casino•
/
•Las Vegas•
/
Casino ••••
/
Read Me
/
Read Me .rsrc
/
CODE_1.txt
< prev
next >
Wrap
Text File
|
1987-04-08
|
17KB
|
292 lines
# near model CODE resource
# jump table entries: 0-0 (1 of them)
export_0:
00000000 4EFA 0016 jmp [PC + 0x16 /* 00000018 */]
00000004 2863 movea.l A4, -[A3]
00000006 2931 3938 3620 426F move.l -[A4], [A1 + 0x3620426F + D3]
0000000E 726C moveq.l D1, 0x6C
00000010 616E bsr +0x70 /* 00000080 */
00000012 6420 bcc +0x22 /* 00000034 */
00000014 496E 742E chk.w D4, [A6 + 0x742E]
label00000018:
00000018 486D FFFC pea.l [A5 - 0x4]
0000001C A86E syscall InitGraf
0000001E A8FE syscall InitFonts
00000020 A912 syscall InitWindows
00000022 A930 syscall InitMenus
00000024 42A7 clr.l -[A7]
00000026 A97B syscall InitDialogs
00000028 A9CC syscall TEInit
0000002A A850 syscall InitCursor
0000002C 2F3C 0000 FFFF move.l -[A7], 0xFFFF
00000032 A032 syscall FlushEvents
label00000034:
00000034 203C 0000 2710 move.l D0, 0x2710
0000003A A11E syscall NewPtr, flags=1
0000003C 0C80 0000 0000 cmpi.l D0, 0x0
00000042 6600 0270 bne +0x272 /* 000002B4 */
00000046 2B48 FDC6 move.l [A5 - 0x23A], A0
0000004A 2B7C 0000 0000 FECA move.l [A5 - 0x136], 0x0
00000052 41FA 0318 lea.l A0, [PC + 0x318 /* 0000036C, value 0x9CA5265 */]
00000056 2B48 FED0 move.l [A5 - 0x130], A0
0000005A 3B7C 0000 FED4 move.w [A5 - 0x12C], 0x0
00000060 1B7C 0000 FED8 move.b [A5 - 0x128], 0x0
00000066 1B7C 0001 FED9 move.b [A5 - 0x127], 0x1
0000006C 2B7C 0000 0000 FEDA move.l [A5 - 0x126], 0x0
00000074 4267 clr.w -[A7]
00000076 41ED FEBE lea.l A0, [A5 - 0x142]
0000007A 2F08 move.l -[A7], A0
0000007C 3F3C 0000 move.w -[A7], 0x0
fn00000080:
00000080 A400 syscall Open/PBHOpen/HOpen, flags=4
00000082 301F move.w D0, [A7]+
00000084 6600 022E bne +0x230 /* 000002B4 */
label00000088:
00000088 302D FECE move.w D0, [A5 - 0x132]
0000008C 6EFA bgt -0x4 /* 00000088 */
0000008E 2B6D FDC6 FEDE move.l [A5 - 0x122], [A5 - 0x23A]
00000094 2B7C 0000 2710 FEE2 move.l [A5 - 0x11E], 0x2710
0000009C 3B7C 0000 FEEA move.w [A5 - 0x116], 0x0
000000A2 2D7C 0000 0000 FEEC move.l [A6 - 0x114], 0x0
000000AA 4267 clr.w -[A7]
000000AC 41ED FEBE lea.l A0, [A5 - 0x142]
000000B0 2F08 move.l -[A7], A0
000000B2 3F3C 0000 move.w -[A7], 0x0
000000B6 A402 syscall Read, flags=4
000000B8 301F move.w D0, [A7]+
label000000BA:
000000BA 302D FECE move.w D0, [A5 - 0x132]
000000BE 6EFA bgt -0x4 /* 000000BA */
000000C0 4267 clr.w -[A7]
000000C2 A001 syscall Close
000000C4 301F move.w D0, [A7]+
000000C6 42A7 clr.l -[A7]
000000C8 42A7 clr.l -[A7]
000000CA 487A 0282 pea.l [PC + 0x282 /* 0000034E, value 0x2A0014, cstring "" */]
000000CE 41FA 02A6 lea.l A0, [PC + 0x2A6 /* 00000376, value 0x6526561, pstring "ReadMe" */]
000000D2 2F08 move.l -[A7], A0
000000D4 3F3C FFFF move.w -[A7], 0xFFFF
000000D8 3F3C 0004 move.w -[A7], 0x4
000000DC 42A7 clr.l -[A7]
000000DE 3F3C FFFF move.w -[A7], 0xFFFF
000000E2 42A7 clr.l -[A7]
000000E4 A913 syscall NewWindow
000000E6 2B5F FDD0 move.l [A5 - 0x230], [A7]+
000000EA 2F2D FDD0 move.l -[A7], [A5 - 0x230]
000000EE A873 syscall SetPort
000000F0 42A7 clr.l -[A7]
000000F2 487A 024A pea.l [PC + 0x24A /* 0000033E, value 0x4, cstring "" */]
000000F6 487A 024E pea.l [PC + 0x24E /* 00000346, value 0x4, cstring "" */]
000000FA A9D2 syscall TENew
000000FC 2B5F FDCC move.l [A5 - 0x234], [A7]+
00000100 2F2D FDCC move.l -[A7], [A5 - 0x234]
00000104 A029 syscall HLock
00000106 2F2D FDC6 move.l -[A7], [A5 - 0x23A]
0000010A 2F2D FEE6 move.l -[A7], [A5 - 0x11A]
0000010E 2F2D FDCC move.l -[A7], [A5 - 0x234]
00000112 A9CF syscall TESetText
00000114 2F2D FDCC move.l -[A7], [A5 - 0x234]
00000118 A9D0 syscall TECalText
0000011A 487A 022A pea.l [PC + 0x22A /* 00000346, value 0x4, cstring "" */]
0000011E 2F2D FDCC move.l -[A7], [A5 - 0x234]
00000122 A9D3 syscall TEUpdate
00000124 226D FDCC movea.l A1, [A5 - 0x234]
00000128 2051 movea.l A0, [A1]
0000012A D1FC 0000 0018 add.l A0, 0x18
00000130 3010 move.w D0, [A0]
00000132 3B40 FDE4 move.w [A5 - 0x21C], D0
00000136 4281 clr.l D1
00000138 3B7A 021C FDE2 move.w [A5 - 0x21E], [PC + 0x21C /* 00000356, value 0x120 */]
0000013E 916D FDE2 sub.w [A5 - 0x21E], D0
00000142 42A7 clr.l -[A7]
00000144 3F3C 012C move.w -[A7], 0x12C
00000148 2F2D FDD0 move.l -[A7], [A5 - 0x230]
0000014C A9BE syscall GetNewControl
0000014E 2B5F FDD4 move.l [A5 - 0x22C], [A7]+
00000152 226D FDCC movea.l A1, [A5 - 0x234]
00000156 2051 movea.l A0, [A1]
00000158 D1FC 0000 005E add.l A0, 0x5E /* '^' */
0000015E 3010 move.w D0, [A0]
00000160 2F2D FDD4 move.l -[A7], [A5 - 0x22C]
00000164 3838 03F6 move.w D4, [0x000003F6 /* FSFCBLen */]
00000168 6A00 000A bpl +0xC /* 00000174 */
0000016C 0440 0011 subi.w D0, 0x11
00000170 4EFA 0006 jmp [PC + 0x6 /* 00000178 */]
label00000174:
00000174 0440 0011 subi.w D0, 0x11
label00000178:
00000178 3B40 FDF4 move.w [A5 - 0x20C], D0
0000017C 3F00 move.w -[A7], D0
0000017E A965 syscall SetControlMaximum/SetMaxCtl
00000180 2F2D FDD0 move.l -[A7], [A5 - 0x230]
00000184 A969 syscall DrawControls
00000186 426D FDEE clr.w [A5 - 0x212]
label0000018A:
0000018A 4267 clr.w -[A7]
0000018C 3F3C 000F move.w -[A7], 0xF
00000190 487A 01C6 pea.l [PC + 0x1C6 /* 00000358, value 0x0, cstring "" */]
00000194 A970 syscall GetNextEvent
00000196 301F move.w D0, [A7]+
00000198 67F0 beq -0xE /* 0000018A */
0000019A 323C 0001 move.w D1, 0x1
0000019E B27A 01B8 cmp.w D1, [PC + 0x1B8 /* 00000358, value 0x0, cstring "" */]
000001A2 6700 0004 beq +0x6 /* 000001A8 */
000001A6 60E2 bra -0x1C /* 0000018A */
label000001A8:
000001A8 4267 clr.w -[A7]
000001AA 2F3A 01B6 move.l -[A7], [PC + 0x1B6 /* 00000362, value 0x0, cstring "" */]
000001AE 487A 01B8 pea.l [PC + 0x1B8 /* 00000368, value 0x0, cstring "" */]
000001B2 A92C syscall FindWindow
000001B4 301F move.w D0, [A7]+
000001B6 D040 add.w D0, D0
000001B8 303B 0006 move.w D0, [PC + D0.w + 0x6]
000001BC 4EFB 0002 jmp [PC + D0.w + 0x2]
000001C0 000E 000E ori.b A6, 0xE
000001C4 000E 0012 ori.b A6, 0x12
000001C8 000E 000E ori.b A6, 0xE
000001CC 00F4 .incomplete
000001CE 4EFA FFBA jmp [PC - 0x46 /* 0000018A */]
000001D2 487A 018E pea.l [PC + 0x18E /* 00000362, value 0x0, cstring "" */]
000001D6 A871 syscall GlobalToLocal
000001D8 41ED FDF6 lea.l A0, [A5 - 0x20A]
000001DC 2B48 FDDC move.l [A5 - 0x224], A0
000001E0 41ED FDDC lea.l A0, [A5 - 0x224]
000001E4 2B48 FDD8 move.l [A5 - 0x228], A0
000001E8 4267 clr.w -[A7]
000001EA 2F3A 0176 move.l -[A7], [PC + 0x176 /* 00000362, value 0x0, cstring "" */]
000001EE 2F3A 0178 move.l -[A7], [PC + 0x178 /* 00000368, value 0x0, cstring "" */]
000001F2 486D FDD8 pea.l [A5 - 0x228]
000001F6 A96C syscall FindControl
000001F8 3B5F FDE0 move.w [A5 - 0x220], [A7]+
000001FC 678C beq -0x72 /* 0000018A */
000001FE 4267 clr.w -[A7]
00000200 2F2D FDD8 move.l -[A7], [A5 - 0x228]
00000204 2F3A 015C move.l -[A7], [PC + 0x15C /* 00000362, value 0x0, cstring "" */]
00000208 487A 00AC pea.l [PC + 0xAC /* 000002B6, value 0x2B5FFDEA */]
0000020C A968 syscall TrackControl
0000020E 301F move.w D0, [A7]+
00000210 0C40 0081 cmpi.w D0, 0x81
00000214 6700 0074 beq +0x76 /* 0000028A */
00000218 6000 FF70 bra -0x8E /* 0000018A */
label0000021C:
0000021C 6000 FF6C bra -0x92 /* 0000018A */
label00000220:
00000220 302D FDEE move.w D0, [A5 - 0x212]
00000224 5240 addq.w D0, 1
00000226 322D FDF4 move.w D1, [A5 - 0x20C]
0000022A B240 cmp.w D1, D0
0000022C 6B00 00C0 bmi +0xC2 /* 000002EE */
00000230 526D FDEE addq.w [A5 - 0x212], 1
00000234 4EFA 00B8 jmp [PC + 0xB8 /* 000002EE */]
label00000238:
00000238 302D FDEE move.w D0, [A5 - 0x212]
0000023C 6700 00B0 beq +0xB2 /* 000002EE */
00000240 536D FDEE subq.w [A5 - 0x212], 1
00000244 4EFA 00A8 jmp [PC + 0xA8 /* 000002EE */]
label00000248:
00000248 302D FDEE move.w D0, [A5 - 0x212]
0000024C 3200 move.w D1, D0
0000024E 0441 0011 subi.w D1, 0x11
00000252 6A00 000C bpl +0xE /* 00000260 */
00000256 3B7C 0000 FDEE move.w [A5 - 0x212], 0x0
0000025C 4EFA 0090 jmp [PC + 0x90 /* 000002EE */]
label00000260:
00000260 046D 0011 FDEE subi.w [A5 - 0x212], 0x11
00000266 4EFA 0086 jmp [PC + 0x86 /* 000002EE */]
label0000026A:
0000026A 066D 0011 FDEE addi.w [A5 - 0x212], 0x11
00000270 362D FDF4 move.w D3, [A5 - 0x20C]
00000274 B66D FDEE cmp.w D3, [A5 - 0x212]
00000278 6700 0074 beq +0x76 /* 000002EE */
0000027C 6A00 0070 bpl +0x72 /* 000002EE */
00000280 3B6D FDF4 FDEE move.w [A5 - 0x212], [A5 - 0x20C]
00000286 4EFA 0066 jmp [PC + 0x66 /* 000002EE */]
label0000028A:
0000028A 4267 clr.w -[A7]
0000028C 2F2D FDD4 move.l -[A7], [A5 - 0x22C]
00000290 A960 syscall GetControlValue/GetCtlValue
00000292 301F move.w D0, [A7]+
00000294 322D FDEE move.w D1, [A5 - 0x212]
00000298 3B40 FDEE move.w [A5 - 0x212], D0
0000029C 9240 sub.w D1, D0
0000029E 3001 move.w D0, D1
000002A0 C1ED FDE4 muls.w D0, [A5 - 0x21C]
000002A4 3F3C 0000 move.w -[A7], 0x0
000002A8 3F00 move.w -[A7], D0
000002AA 2F2D FDCC move.l -[A7], [A5 - 0x234]
000002AE A9DD syscall TEScroll
000002B0 6000 FF6A bra -0x94 /* 0000021C */
label000002B4:
000002B4 A9F4 syscall ExitToShell
000002B6 2B5F FDEA move.l [A5 - 0x216], [A7]+
000002BA 302D FDE0 move.w D0, [A5 - 0x220]
000002BE 0C40 0081 cmpi.w D0, 0x81
000002C2 6700 0072 beq +0x74 /* 00000336 */
000002C6 4E71 nop
000002C8 321F move.w D1, [A7]+
000002CA 225F movea.l A1, [A7]+
000002CC 48E7 FFF8 movem.l -[A7], D0,D1,D2,D3,D4,D5,D6,D7,A0,A1,A2,A3,A4
000002D0 0C41 0014 cmpi.w D1, 0x14
000002D4 6700 FF62 beq -0x9C /* 00000238 */
000002D8 0C41 0015 cmpi.w D1, 0x15
000002DC 6700 FF42 beq -0xBC /* 00000220 */
000002E0 0C41 0017 cmpi.w D1, 0x17
000002E4 6784 beq -0x7A /* 0000026A */
000002E6 0C41 0016 cmpi.w D1, 0x16
000002EA 6700 FF5C beq -0xA2 /* 00000248 */
label000002EE:
000002EE 4267 clr.w -[A7]
000002F0 2F2D FDD4 move.l -[A7], [A5 - 0x22C]
000002F4 A960 syscall GetControlValue/GetCtlValue
000002F6 301F move.w D0, [A7]+
000002F8 3B40 FDF0 move.w [A5 - 0x210], D0
000002FC 3B6D FDEE FDF2 move.w [A5 - 0x20E], [A5 - 0x212]
00000302 2F2D FDD4 move.l -[A7], [A5 - 0x22C]
00000306 3F2D FDEE move.w -[A7], [A5 - 0x212]
0000030A A963 syscall SetControlValue/SetCtlValue
0000030C 322D FDF2 move.w D1, [A5 - 0x20E]
00000310 926D FDF0 sub.w D1, [A5 - 0x210]
00000314 6700 0016 beq +0x18 /* 0000032C */
00000318 C3ED FDE4 muls.w D1, [A5 - 0x21C]
0000031C 5341 subq.w D1, 1
0000031E 4641 not.w D1
00000320 3F3C 0000 move.w -[A7], 0x0
00000324 3F01 move.w -[A7], D1
00000326 2F2D FDCC move.l -[A7], [A5 - 0x234]
0000032A A9DD syscall TEScroll
label0000032C:
0000032C 4CDF 1FFF movem.l D0,D1,D2,D3,D4,D5,D6,D7,A0,A1,A2,A3,A4, [A7]+
00000330 206D FDEA movea.l A0, [A5 - 0x216]
00000334 4ED0 jmp [A0]
label00000336:
00000336 4E71 nop
00000338 206D FDEA movea.l A0, [A5 - 0x216]
0000033C 4ED0 jmp [A0]
0000033E 0000 0004 ori.b D0, 0x4
// begin alternate branch 00000340-00000344
label00000340:
00000340 0004 0120 ori.b D4, 0x20 /* ' ' */
// end alternate branch 00000340-00000344
label00000340: // (misaligned)
00000342 0120 btst -[A0], D0
00000344 01D0 .incomplete
00000346 0000 0004 ori.b D0, 0x4
0000034A 0120 btst -[A0], D0
0000034C 01D0 .incomplete
0000034E 002A 0014 014A ori.b [A2 + 0x14A], 0x14
00000354 01F4 .incomplete
00000356 0120 btst -[A0], D0
00000358 0000 0000 ori.b D0, 0x0
0000035C 0000 0000 ori.b D0, 0x0
00000360 0000 0000 ori.b D0, 0x0
00000364 0000 0000 ori.b D0, 0x0
00000368 0000 0000 ori.b D0, 0x0
0000036C 09CA .incomplete
0000036E 5265 addq.w -[A5], 1
00000370 6164 bsr +0x66 /* 000003D6 */
00000372 204D movea.l A0, A5
00000374 65CA bcs -0x34 /* 00000340 */
00000376 0652 6561 addi.w [A2], 0x6561 /* 'ea' */
0000037A 644D bcc +0x4F /* 000003C9 */
0000037C 6500 .incomplete